home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1995 May / cd Ware (Juegos) Epimundo.iso / DOS / C / TCCLIB.ZIP / OUTCHAR.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-01-31  |  260 b   |  15 lines
  1. unsigned char far *CurrentPos( void );
  2.  
  3. void TcclibInitialize( void );
  4. extern unsigned char attrib;
  5.  
  6. void OutChar( unsigned char c )
  7. {
  8.     register unsigned char far *scptr = CurrentPos();
  9.  
  10.     TcclibInitialize();
  11.  
  12.     *scptr++ = c;
  13.     *scptr   = attrib;
  14. }
  15.